perm filename CODMAC.TEX[1,3]1 blob sn#542085 filedate 1980-11-19 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	% FONTS				READ MAXTEX for documentation.
C00003 00003	% NOFILL MODE, GRFX
C00008 ENDMK
C⊗;
% FONTS				READ MAXTEX for documentation.
 
	% Font definitions:
\def\ttwr{\ninepoint\tt}
\def\grafix{\:>\baselineskip -1pt}
% NOFILL MODE, GRFX

	% Typewrite or graphics mode, without justification.  Example:
	%
	% {\grfx
	%				⊂αααααααααααα⊃
	%   line  2			~   a  box   ~
	%               line 3		%αααααααααααα$
	% }\par
	%
	% Font used is GRFX35.  You may also box result to indent it or place
	%   at your favorite spot (see DOCMAC).
	% Inside this mode, TEX will only recognize \ { }. All other chars are
	%   taken literally (you may use \\,\{,\} in this mode).

	% Similar to \grfx; but font used is "cmtt"; type {\typewrite <no fill> text}
\def\typewrite{\ttwr\def\ {\hbox to 1em{}}\nofill}  % \SP
\def\typnoi{\typewrite\noindent}
	% As described above:
\def\grfx{\grfxnof\noindent}
	% Good to make boxes; type \hbox par 5vu{\grfxnof ...
\def\grfxnof{\grafix
		\def\ {\char'40{}}    % \SP
		\def\\{{char'134}}
                \def\{{{char'173}}
		\def\}{{char'176}}
		\nofill}
	% Use this to allow a break in a long \nofill:
\def\nofbreak{\par\noindent}


% FOR internal use;  use at own risk
	% Produce "nofill" text.  Note result is a paragraph. See DOCMAC
	%   for details.
\def\nofill{\ragged 1000000
	\parskip 0pt
	\lineskip 0pt
	\def\	{{\ms f}}	% \TAB (surprise)
	\def\
{\ \par\noindent}			% \CR  (pend linebreak)
	\chcode'1←12	% ↓
	\chcode'26←12	% ⊗
	\chcode'32←12	% ~
	\chcode'42←12	% "
	\chcode'43←12	% #
	\chcode'44←12	% $
	\chcode'45←12	% %
	\chcode'136←12	% ↑
\chcode'11←13\chcode'15←13\chcode'40←13} % tab, cr, sp